home *** CD-ROM | disk | FTP | other *** search
- #! /bin/sh -f
- # Synopsis: Collect statistics of the kibitz on a go game on IGS
- # Usage : getstats igs_file
- # Author : Jan van der Steen
- # Date : Thu Jan 21 12:08:35 MET 1993
- # The results are written in:
- RANK=kibitz.rnk
- DICT=kibitz.dic
- FREQ=kibitz.frq
- BYTE=kibitz.byt
- # Get options
- if [ $# != 1 ]
- echo "Usage: `basename $0` igs_file"
- exit 0
- GAME=$1
- # Internal variables
- usr=/tmp/igs$$
- # Get the name and rank of the kibitzers
- # jansteen 4d : The rematch of last weeks match --> jansteen 4d
- # jansteen 4d*: The rematch of last weeks match --> jansteen 4d*
- grep "^ " ${GAME} |\
- awk '{print $1 " " $2}' |\
- sed 's/://' |\
- sort -u > ${usr}
- # "name rank" --> "name rank #msg #bytes"
- for i in `cat ${usr}`
- do
- if [ -z "${U}" ]
- then U=$i
- else
- U="${U} $i"
- echo ${U} `grep "^ ${U}[ ]*:" ${GAME} | sed 's/^ ${U}[ ]*: //' | wc`
- U=""
- done
- ) | awk '{printf("%-12s\t%3s\t%3d\t%5d\n", $1, $2, $3, $5)}' > ${usr}.inf
- # "name rank #msg #bytes" --> \kdict{name}{rank}
- echo '\\clearpage'
- echo "\\section{Observers sorted by name}"
- cat ${usr}.inf \
- | sort -d \
- | awk '{printf("\\kdict{%-12s}{%3s}\n", $1, $2)}'
- ) > ${DICT}
- # "name rank #msg #bytes" --> \krank{name}{rank}
- echo '\\vskip30cm'
- echo "\\section{Observers sorted by rank}"
- cat ${usr}.inf \
- | sort -n -r +1 \
- | awk '{printf("\\krank{%-12s}{%3s}\n", $1, $2)}'
- ) > ${RANK}
- # "name rank #msg #bytes" --> \kfreq{name}{rank}{#msg}
- echo '\\vskip30cm'
- echo "\\section{Observers sorted by frequency}"
- cat ${usr}.inf \
- | sort -n -r +2 \
- | awk '{printf("\\kfreq{%-12s}{%3s}{%3d}\n", $1, $2, $3)}'
- ) > ${FREQ}
- # "name rank #msg #bytes" --> \kbyte{name}{rank}{#bytes}
- echo '\\vskip30cm'
- echo "\\section{Observers sorted by amount}"
- cat ${usr}.inf \
- | sort -n -r +3 \
- | awk '{printf("\\kbyte{%-12s}{%3s}{%5d}\n", $1, $2, $4)}'
- ) > ${BYTE}
- rm ${usr} ${usr}.inf
- exit 0
-